(mh-make-seq, mh-seq-name): Use defsubst.

diff --git a/lisp/mh-e/mh-seq.el b/lisp/mh-e/mh-seq.el
index 87c59cd81369306191480167fd89873140ebe387..fd64d8a6902bd830aa7f378eefede7283526065b 100644 (file)
--- a/lisp/mh-e/mh-seq.el
+++ b/lisp/mh-e/mh-seq.el
@@ -53,13 +53,13 @@
 
 ;;; Macros
 
-(defmacro mh-make-seq (name msgs)
+(defsubst mh-make-seq (name msgs)
   "Create sequence NAME with the given MSGS."
-  (list 'cons name msgs))
+  (cons name msgs))
 
-(defmacro mh-seq-name (sequence)
+(defsubst mh-seq-name (sequence)
   "Extract sequence name from the given SEQUENCE."
-  (list 'car sequence))
+  (car sequence))
 
 \f